home *** CD-ROM | disk | FTP | other *** search
/ The Kara Collection / Kara Collection v3.0 (1996-09-12)(Cloanto).iso / utilities / h / 0 / 6 / 7 / setppview < prev    next >
Text File  |  1996-09-09  |  3KB  |  107 lines
  1. .k ""
  2. .bra {
  3. .ket }
  4.  
  5. If EXISTS /Utilities/H
  6.   Assign KARACDROOT: /
  7. Else
  8.   Assign KARACDROOT: KaraCD:
  9. EndIf
  10.  
  11. If NOT Exists RAM:T/KaraCD-IPT/UndoAssign
  12.   CD KARACDROOT:
  13.   Execute KARACDROOT:Utilities/H/2/AutoAssign
  14. EndIf
  15.  
  16. If EXISTS RAM:KaraCDBusy
  17.   Echo "*N The CD-ROM is currently being configured. Please wait."
  18.   Wait 6 SECS
  19.   If EXISTS RAM:KaraCDBusy
  20.     Echo "*N The CD-ROM is still being configured..."
  21.     Wait 6 SECS
  22.   EndIf
  23.   If EXISTS RAM:KaraCDBusy
  24.     Echo "*N The CD-ROM is still being configured..."
  25.     Wait 10 SECS
  26.   EndIf
  27.   If EXISTS RAM:KaraCDBusy
  28.     Echo "*N It appears that the configuration is still in progress."
  29.     Echo " If SetPPView does not appear, please free some resources,"
  30.     Echo " try again and/or select the KaraCD *"Reset*" icon."
  31.   Else
  32.     Echo "*N Configuration complete. Continuing with SetPPView procedure.*N"
  33.   EndIf
  34. EndIf
  35.  
  36. Assign KARACDINST:
  37.  
  38. If EXISTS SYS:Utilities/Installer
  39.   Failat 21
  40.   Version >NIL: SYS:Utilities/Installer
  41.   If FAIL
  42.     KARACDROOT:Utilities/H/2/Deplode >NIL: SYS:Utilities/Installer T:Installer
  43.     Version >NIL: T:Installer
  44.     If NOT FAIL
  45.       Version >NIL: T:Installer 1 24
  46.       If NOT WARN
  47.         Assign KARACDINST: SYS:Utilities
  48.       EndIf
  49.     EndIf
  50.     Delete >NIL: T:Installer
  51.   Else
  52.     Version >NIL: SYS:Utilities/Installer 1 24
  53.     If NOT WARN
  54.       Assign KARACDINST: SYS:Utilities
  55.     EndIf
  56.   EndIf
  57.   Failat 10
  58. EndIf
  59.  
  60. Assign >NIL: KARACDINST: EXISTS
  61. If WARN
  62.   If EXISTS C:Installer
  63.     Failat 21
  64.     Version >NIL: C:Installer
  65.     If FAIL
  66.       KARACDROOT:Utilities/H/2/Deplode >NIL: C:Installer T:Installer
  67.       Version >NIL: T:Installer
  68.       If NOT FAIL
  69.         Version >NIL: T:Installer 1 24
  70.         If NOT WARN
  71.           Assign KARACDINST: C:
  72.         EndIf
  73.       EndIf
  74.       Delete >NIL: T:Installer
  75.     Else
  76.       Version >NIL: C:Installer 1 24
  77.       If NOT WARN
  78.         Assign KARACDINST: C:
  79.       EndIf
  80.     EndIf
  81.     Failat 10
  82.   EndIf
  83. EndIf
  84.  
  85. Assign >NIL: KARACDINST: EXISTS
  86. If WARN
  87.   Version >NIL: icon.library 38
  88.   If WARN
  89.     Assign KARACDINST: KARACDROOT:Utilities/H/6/1/1
  90.   Else
  91.     Assign KARACDINST: KARACDROOT:Utilities/H/6/1/2
  92.   EndIf
  93. EndIf
  94.  
  95. If $KaraCDLanguage EQ 0
  96.   KARACDROOT:Utilities/H/2/RunIcon KARACDROOT:Utilities/H/6/0/2/SetPPView.eng
  97. EndIf
  98. If $KaraCDLanguage EQ 1
  99.   KARACDROOT:Utilities/H/2/RunIcon KARACDROOT:Utilities/H/6/0/2/SetPPView.deu
  100. EndIf
  101. If $KaraCDLanguage EQ 3
  102.   KARACDROOT:Utilities/H/2/RunIcon KARACDROOT:Utilities/H/6/0/2/SetPPView.fra
  103. EndIf
  104. If $KaraCDLanguage EQ 2
  105.   KARACDROOT:Utilities/H/2/RunIcon KARACDROOT:Utilities/H/6/0/2/SetPPView.ita
  106. EndIf
  107.